object FormJoinGroupName: TFormJoinGroupName Left = 523 Top = 246 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle BorderWidth = 6 Caption = 'Wprowad'#378' now'#261' nazw'#281 ClientHeight = 67 ClientWidth = 303 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -9 Font.Name = 'Verdana' Font.Style = [] OldCreateOrder = False Position = poDesktopCenter PixelsPerInch = 96 TextHeight = 12 object Label1: TLabel Left = 0 Top = 46 Width = 76 Height = 13 Caption = 'Nowa nazwa:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 0 Top = 8 Width = 253 Height = 14 Caption = 'Wprowad'#378' now'#261' nazw'#281' metakontaktu' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'Verdana' Font.Style = [fsBold] ParentFont = False end object NewName: TEdit Left = 88 Top = 42 Width = 121 Height = 21 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 0 OnKeyPress = NewNameKeyPress end object ButtonOk: TButton Left = 224 Top = 40 Width = 75 Height = 25 Caption = 'OK' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Verdana' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = ButtonOkClick end end